home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: New Zealand Amiga Users Group / New Zealand Amiga Users Group Newsdisk v25 (1989-08)(NZAmigaUG).zip / New Zealand Amiga Users Group Newsdisk v25 (1989-08)(NZAmigaUG).adf / StrucBrowser / sb.src.zoo / SBTextAttr.c < prev    next >
C/C++ Source or Header  |  1988-06-22  |  959b  |  35 lines
  1. /************************************************************************
  2. *                                    *
  3. *                SBExecBase                *
  4. *                                    *
  5. *        module written by G. Gagnon, Mar 24, 1987        *
  6. *                                    *
  7. *************************************************************************/
  8.  
  9. include "sb:sb.h"
  10.  
  11. extern int level;
  12.  
  13.  
  14. void PrTextAttr(string, textattr) char *string; struct TextAttr *textattr;
  15. {
  16. static struct StructData structdata[] = {
  17.      { " ta_Name",      "UBYTE *",                   4, PTRSIZE  },
  18.      { "-ta_YSize",     "UWORD",                     2, INTSIZE  },
  19.      { "-ta_Style",     "UBYTE",                     3, BYTESIZE },
  20.      { "-ta_Flags",     "UBYTE",                     3, BYTESIZE }
  21.   };
  22. int sum, choice = -1;
  23.   level++;
  24.   while (choice) {
  25.     sum = SetOptionText(string, structdata, (APTR)textattr, DATASIZE, 0);
  26.     switch (choice = GetChoice(DATASIZE)) {
  27.       case 1:
  28.         PrString("ta_Name",textattr->ta_Name);
  29.         break;
  30.     }
  31.   }
  32.   level--;
  33. }
  34.  
  35.